﻿Imports Bussines.Data
Imports Bussines.entity
Public Class invitacionBL
    Dim DALInvitacion As New invitacionDAL
    Public Function GrabarInvitacion(ByVal BEinvitacion As invitacionBE) As String
        Return DALInvitacion.GrabarInvitacion(BEinvitacion)
    End Function

    Public Function ListarInvitacionXInvitacion(ByVal intCodInvitacion As Integer) As DataTable
        Return DALInvitacion.ListarInvitacionXInvitacion(intCodInvitacion)
    End Function
    Public Function listarAsistentesInvitacion_mail(ByVal intCodInvitacion As Integer) As DataTable
        Return DALInvitacion.listarAsistentesInvitacion_mail(intCodInvitacion)
    End Function

    Public Function listarInvitacionCabecera_mail(ByVal intCodInvitacion As Integer) As DataTable
        Return DALInvitacion.listarInvitacionCabecera_mail(intCodInvitacion)
    End Function

    Public Function ActualizarIDSharepoint(ByVal intIdInvitacion As Integer, ByVal intIdSharepoint As Integer)
        Return DALInvitacion.ActualizarIDSharepoint(intIdInvitacion, intIdSharepoint)
    End Function

    Public Function grupoSharepointXInvitacion(ByVal intIdInvitacion As Integer) As String
        Return DALInvitacion.grupoSharepointXInvitacion(intIdInvitacion)
    End Function

    Public Function ListarUltimasInvitaciones()
        Return DALInvitacion.ListarUltimasInvitaciones()
    End Function

    Public Function ListarBusquedaInvitaciones(ByVal idEquipo As String, ByVal Asunto As String) As DataTable
        Return DALInvitacion.ListarBusquedaInvitaciones(idEquipo, Asunto)
    End Function

    Public Function ListarInvitacionXId(ByVal idInvitacion As Integer) As DataTable
        Return DALInvitacion.ListarInvitacionXId(idInvitacion)
    End Function

    Public Function ListarInvitacionXId_VistaPrevia(ByVal idInvitacion As Integer) As DataTable
        Return DALInvitacion.ListarInvitacionXId_VistaPrevia(idInvitacion)
    End Function

    Public Function BuscarInvitacionXId(ByVal idInvitacion As Integer) As DataTable
        Return DALInvitacion.BuscarInvitacionXId(idInvitacion)
    End Function


    Public Function ListarInvitacionXAsistentes(ByVal idInvitacion As Integer) As DataTable
        Return DALInvitacion.ListarInvitacionXAsistentes(idInvitacion)
    End Function

    Public Function ListarInvitacionXAsistentes_Invitacion(ByVal idInvitacion As Integer) As DataTable
        Return DALInvitacion.ListarInvitacionXAsistentes_Invitacion(idInvitacion)
    End Function

    Public Function obtenerCodigoInvitacionxidSharepoint(ByVal idSharepointInv As Integer) As Integer
        Return DALInvitacion.obtenerCodigoInvitacionxidSharepoint(idSharepointInv)
    End Function

    Public Sub BloquearInvitacion(ByVal idInvitacion As Int32)
        DALInvitacion.BloquearInvitacion(idInvitacion)
    End Sub

    Public Function IdSharepointInvitacion(ByVal idInvitacion As Int32) As Integer
        Return DALInvitacion.IdSharepointInvitacion(idInvitacion)
    End Function
End Class
